home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 6 / c_wndw.zip / ACCEPT1.C next >
Text File  |  1989-05-25  |  424b  |  18 lines
  1. /*  (c) Marietta Systems, Inc.  1987
  2. *   All rights reserved
  3. *
  4. *   Program to demonstrate use of accept function 
  5. */
  6. #include "mtest.h"
  7. void main() {
  8. int x = 2;
  9. byte text[16];
  10. clr_scrn("Accept test - 1");
  11. display("Enter column of numbers, press function key to end",
  12.      1, 1, high);
  13. set_crsr(x, 5);
  14. while (INCHAR != QUIT) {accept(text, decimal, alt_reverse, 9, 2); 
  15.      set_crsr(++x, 5);}
  16. goodbye(0);
  17. }
  18.